Resource Library: Multimedia/Resource Library: Multimedia.iso/hypercrd/bok-bndr.hqx/Bookbinder/card_8278.txt

Text File | 1991-06-04 | 30.1 KB | 1,537 lines

-- card: 8278 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 4755
-- name: contents (cont)
----- HyperTalk script -----
on updateContents
  global deletedCard
  put 36*((the number of me)-(the number of card "contents")) into base
  set cursor to watch
  put 4 into firstField
  repeat with x = 1 to 36
    get line x+base of card field "content list" of card "contents"
    if it is word 3 of deletedCard then
      put "" into line x+base of card field "content list" of card "contents"
      get ""
    end if
    if it is "" then
      put "" into card field (2*x+firstField) of card (the number of me)
      put "" into card field (2*x-1+firstField) of card (the number of me)
    else
      put the number of card id it into card field (2*x-1+firstField) of card (the number of me)
      put it into card field (2*x+firstField) of card (the number of me)
      get field "heading" of card id it
      put it into word 1 of card field (2*x+firstField) of card (the number of me)
    end if
  end repeat
  put (the number of me) + 1 into nextCard
  get the name of card nextCard
  get word 2 of it
  get char 2 to 9 of it
  if it is "contents" then
    send updateContents to card nextCard
  end if
end updateContents




-- part 26 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=7 top=57 right=300 bottom=502
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:


-- part 14 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=141 top=21 right=36 bottom=237
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bookmark1


-- part 20 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=118 top=37 right=55 bottom=355
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: instructions


-- part 24 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=237 top=21 right=36 bottom=333
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bookmark2


-- part 25 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=333 top=21 right=36 bottom=429
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bookmark3


-- part 29 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=60 right=74 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 28 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=60 right=74 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 31 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=73 right=87 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 30 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=73 right=87 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 33 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=86 right=100 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 32 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=86 right=100 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 35 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=99 right=113 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 34 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=99 right=113 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 37 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=112 right=126 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 36 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=112 right=126 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 39 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=125 right=139 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 38 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=125 right=139 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 44 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=138 right=151 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 43 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=138 right=152 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 46 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=151 right=165 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 45 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=151 right=165 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 48 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=164 right=178 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 47 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=164 right=178 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 50 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=177 right=191 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 49 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=177 right=191 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 52 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=190 right=203 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 51 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=190 right=204 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 54 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=203 right=217 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 53 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=203 right=217 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 56 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=216 right=230 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 55 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=216 right=230 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 58 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=229 right=243 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 57 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=229 right=243 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 60 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=242 right=255 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 59 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=242 right=256 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 62 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=255 right=268 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 61 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=255 right=269 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 64 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=268 right=282 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 63 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=268 right=282 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 66 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=190 top=281 right=295 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 65 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=14 top=281 right=295 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 84 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=60 right=74 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 85 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=60 right=74 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 90 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=73 right=87 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 89 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=73 right=87 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 92 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=86 right=100 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 91 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=86 right=100 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 94 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=99 right=113 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 93 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=99 right=113 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 96 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=112 right=126 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 95 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=112 right=126 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 98 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=125 right=139 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 97 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=125 right=139 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 100 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=138 right=152 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 99 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=138 right=152 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 102 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=151 right=165 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 101 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=151 right=165 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 104 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=164 right=178 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 103 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=164 right=178 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 106 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=177 right=191 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 105 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=177 right=191 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 108 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=190 right=204 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 107 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=190 right=204 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 110 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=203 right=217 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 109 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=203 right=217 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 112 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=216 right=230 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 111 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=216 right=230 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 114 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=229 right=243 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 113 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=229 right=243 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 116 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=242 right=256 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 115 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=242 right=256 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 118 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=255 right=269 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 117 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=255 right=269 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 120 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=268 right=282 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 119 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=268 right=282 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 122 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=451 top=281 right=295 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:


-- part 121 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=275 top=281 right=295 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name:
----- HyperTalk script -----
on mouseUp
  visual iris open
  get the number of the target
  get card field (it-1)
  if it is not "" then
    go card it
  end if
end mouseUp



-- part 127 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=352 top=26 right=43 bottom=475
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Add Contents Pg.
----- HyperTalk script -----
on mouseUp
  put the userLevel into currentLevel
  set the userLevel to 5
  doMenu "Copy Card"
  doMenu "Paste Card"
  put "" into field "page no"
  send updateContents to this card
  set the userLevel to currentLevel
end mouseUp



-- part contents for background part 7
----- text -----
3

-- part contents for card part 14
----- text -----
card id 4342

-- part contents for background part 6
----- text -----
Contents (cont.)

-- part contents for background part 4
----- text -----










-- part contents for card part 24
----- text -----
0

-- part contents for card part 25
----- text -----
0

-- part contents for background part 17
----- text -----
p6